#include <iostream>
#include <sys/select.h>
#include <sys/time.h>
#include "Socket.hpp"
using namespace std;

const uint16_t defaultport = 8888;
const int fd_num_max = sizeof(fd_set) * 8;
int defaultfd = -1;

class selectserver
{
public:
    selectserver(uint16_t port = defaultport) : _port(port)
    {
        for (int i = 0; i < fd_num_max; i++)
        {
            fd_array[i] = defaultfd;
        }
    }
    ~selectserver()
    {
    }
    bool Init()
    {
        _listensock.Socket();
        _listensock.Bind(_port);
        _listensock.Listen();

        return true;
    }
    void Accepter()
    {
        // 接收客户端的ip和端口号
        string clientip;
        uint16_t clientport = 0;
        int sock = _listensock.Accept(&clientip, &clientport);
        if (sock < 0)
            return;
        lg(Info, "accept new link, %s: %d, sock fd: %d", clientip.c_str(), clientport, sock);
        // 对于建立好的链接要去让它们进行等待select
        int pos = 1;
        // 建立链接要进行判断select还有没有空余位置，如果select都满了，那对于建立新的链接就无能为力了
        for (; pos < fd_num_max; pos++)
        {
            if (fd_array[pos] != defaultfd)
                continue;
            else
                break;
        }
        // 如果当前select已经满了，说明已经不能再建立新的链接了
        if (pos == fd_num_max)
        {
            lg(Warning, "server is full, close %d", sock);
            close(sock);
        }
        // 如果当前select没有满，那么就说明此时可以去进行等待了
        else
        {
            fd_array[pos] = sock;
        }
    }
    void Recver(int fd, int pos)
    {
        char buffer[1024];
        // 此时可以直接进行读取，不会阻塞，因为已经是就绪了才会加到select当中的
        ssize_t n = read(fd, buffer, sizeof(buffer) - 1);
        if (n > 0)
        {
            buffer[n] = 0;
            cout << "get message " << buffer << endl;
        }
        else if (n == 0)
        {
            // 如果是0，就说明客户端已经退出了，那么服务端也就不用维护这段链接了
            lg(Info, "client quit, server quit, close fd is %d", fd);
            close(fd);
            // 将对应的信息重新设置为-1，表示的是这个位置可以接收新的select了
            fd_array[pos] = defaultfd;
        }
        else
        {
            // 如果是这样，就是接收失败了，这里也把这个链接直接关掉就可以了
            lg(Warning, "read error, close fd is %d", fd);
            close(fd);
            // 将对应的信息重新设置为-1，表示的是这个位置可以接收新的select了
            fd_array[pos] = defaultfd;
        }
    }
    void Dispatcher(fd_set &rfds)
    {
        // 对于等待的信息进行循环等待
        for (int i = 0; i < fd_num_max; i++)
        {
            int fd = fd_array[i];
            // 如果这个fd没被使用过，就跳过它
            if (fd == defaultfd)
                continue;
            if (FD_ISSET(fd, &rfds))
            {
                // 如果是建立链接的select
                if (fd == _listensock.Fd())
                    Accepter();
                // 如果是等待读取信息的select
                else
                    Recver(fd, i);
            }
        }
    }

    void Start()
    {
        int listensock = _listensock.Fd();
        fd_array[0] = listensock;
        for (;;)
        {
            fd_set rfds;
            FD_ZERO(&rfds);
            // 设置监听
            int maxfd = fd_array[0];
            // 循环判断有哪些需要被监听
            for (int i = 0; i < fd_num_max; i++)
            {
                if (fd_array[i] == defaultfd)
                    continue;
                FD_SET(fd_array[i], &rfds);
                if (maxfd < fd_array[i])
                {
                    maxfd = fd_array[i];
                    lg(Info, "max fd update, max fd is: %d", maxfd);
                }
            }
            struct timeval timeout = {0, 0};
            int n = select(5, &rfds, nullptr, nullptr, /*&timeout*/ nullptr);
            switch (n)
            {
            case 0:
                cout << "timeout : " << timeout.tv_sec << "." << timeout.tv_usec << endl;
                break;
            case -1:
                cerr << "select error" << endl;
                break;
            default:
                cout << "get a new link" << endl;
                // 对select进行处理
                Dispatcher(rfds);
                break;
            }
        }
    }

private:
    Sock _listensock;
    uint16_t _port;
    int fd_array[fd_num_max];
};